home *** CD-ROM | disk | FTP | other *** search
/ El Mac 9 / El Mac 9.iso / Shareware / Applications / MathPad 2.4 / XFuns / fft / fft.rsrc / TEXT_129_invfft().txt < prev    next >
Encoding:
Text File  |  1996-03-06  |  593 b   |  21 lines
  1. ---------------- invfft(C)
  2. -- performs an inverse Fourier transform. It returns the time sampled complex function in the global array "transform".
  3.  
  4. c(t) = {t*f-trunc(t*f)-.5,0}  -- example complex function 
  5. C[i] = c(dt*(i-1)) dim[n]     -- sample the function
  6. n=64;     f=4;      dt=1/n
  7.  
  8. Xmin=0; Xmax=dt*(n-1); Xsteps=300; Xlabel="secs"
  9. plot c(X)[1]
  10. plot realpart(C)
  11.  
  12. fft(C):;             -- transform it
  13.  
  14. newaxis
  15. -- inverse transform should match original time samples
  16. invfft(transform):
  17. plot realpart(transform)
  18.  
  19. ---------------------------------------
  20. realpart(z)[i] = z[i,1] dim[count(z)]
  21.